 10 CD$ =  CHR$ (4)
 20  PRINT : PRINT CD$"BLOADQUARK.LOGO,A$4000"
 25  HGR : POKE  - 16302,0
 27  PRINT : PRINT CD$"BLOADUP": CALL 4096
 40  FOR X = 1 TO 3500: NEXT : HGR2
 50  PRINT : PRINT CD$"BLOADSQ1,A$A00"
 60  PRINT : PRINT CD$"BLOADSQ2,A$4000"
 70  CALL 8192
